home *** CD-ROM | disk | FTP | other *** search
/ Flybox Trout (Edition 1) / Flybox Trout (Edition 1).iso / Setup / Support / FlyBox.swf / scripts / DefineSprite_172 / frame_1 / DoAction.as
Encoding:
Text File  |  2002-04-15  |  708 b   |  31 lines
  1. CurPage = eval("_root:rCurPage");
  2. if(eval("..:Results") == 0)
  3. {
  4.    gotoAndStop(2);
  5. }
  6. else if(eval("..:Results") == 1)
  7. {
  8.    ResultText = "Your seach has returned " & Results & " result";
  9.    PageText = "PAGE 1 of 1";
  10. }
  11. else
  12. {
  13.    ResultText = "Your seach has returned " + eval("..:Results") + " results";
  14.    Pages = eval("..:Results");
  15.    Pages = int(Pages / 7);
  16.    if(Pages * 7 < eval("..:Results"))
  17.    {
  18.       Pages += 1;
  19.    }
  20.    PageText = "PAGE " + CurPage + " of " + Pages;
  21. }
  22. a = 1;
  23. while(6 >= a)
  24. {
  25.    duplicateMovieClip("Result0","Result" + a,16384 + (a + 1));
  26.    setProperty("Result" + a, _Y, getProperty("Result" + (a - 1), _Y) + 80);
  27.    a++;
  28. }
  29. call("PopResults");
  30. stop();
  31.